home *** CD-ROM | disk | FTP | other *** search
/ Amiga Games: Greatest Hits 1996 / Amiga Games: Greatest Hits 1996.iso / userbox / publicdomain / yagin / examples / get_news next >
Text File  |  1996-07-06  |  1KB  |  36 lines
  1.  
  2. ; $VER: Get_News 1.0 (5.7.95) Arndt van der Molen
  3.  
  4. changetaskpri -2
  5.  
  6. echo "*NFollowing newsgroups are subscribed in your 'UULIB:News/Active' file:"
  7. echo "---------------------------------------------------------------------"
  8. type UULIB:News/Active
  9.  
  10.  
  11. echo "*NGetting NEWS from your server '$nntpserver' ...*N"
  12. INet:c/nntpget SUBSCRIPTIONS=UULIB:News/Active DATESTAMP=UULIB:.nntp_ds TO=UULIB:News/batched_news APPEND NNTPSERVER=$nntpserver NBUFS=15
  13. echo "*NGetting NEWS finished!"
  14. echo "-----------------------------------------------------------------"
  15.  
  16. IF NOT `list uulib:News/batched_news lformat="%L"` EQ "empty"
  17.   echo "*NSorting NEWS to UUNEWS: ...*N"
  18.   UUCP:c/rnews UULIB:News/batched_news
  19.   delete >NIL: UULIB:News/batched_news
  20.   echo "Sorting NEWS finished!"
  21. ELSE
  22.   echo "*NNo NEWS to sort ..."
  23. ENDIF
  24. echo "-----------------------------------------------------------------"
  25.  
  26. echo "*NTrimming Message ID history file to 7 days ...*N"
  27. UUCP:c/trimhist 7
  28. echo "Trimming Message ID finished!"
  29. echo "-----------------------------------------------------------------"
  30.  
  31. echo "*NDon't forget to occasionally trim the message base with 'trimnews' ...*N"
  32.  
  33. echo "*NReady!*N"
  34.  
  35. changetaskpri 0
  36.